*** Stata 15 reproduction code for

*Mader, Matthias & Harald Schoen.
*What a difference an event can make: The European refugee crisis, party competition, and voters’ responses in Germany
*West European Politics


*** Table A3-1: Attitude stability in the 2013 campaign panel among 2017 respondents and dropouts
***************************************************************************************************

use "DATA_wide.dta", clear
	
	pwcorr merkel1 merkel7 if dropout1 == 0
	pwcorr merkel1 merkel7 if dropout1 == 1

	pwcorr seeh1 seeh7 if dropout1 == 0
	pwcorr seeh1 seeh7 if dropout1 == 1
	
	pwcorr b_cdu1 b_cdu2 if dropout1 == 0
	pwcorr b_cdu1 b_cdu2 if dropout1 == 1

	pwcorr b_spd1 b_spd7 if dropout1 == 0
	pwcorr b_spd1 b_spd7 if dropout1 == 1

	pwcorr b_afd1 b_afd7 if dropout1 == 0
	pwcorr b_afd1 b_afd7 if dropout1 == 1

	pwcorr immi1 immi7 if dropout1 == 0
	pwcorr immi1 immi7 if dropout1 == 1
	
	tab icdu1 icdu7 if dropout1 == 0, cell
	tab icdu1 icdu7 if dropout1 == 1, cell	
	
	tab ispd1 ispd7 if dropout1 == 0, cell
	tab ispd1 ispd7 if dropout1 == 1, cell	
	
	tab wunion1 wunion7 if dropout1 == 0, cell
	tab wunion1 wunion7 if dropout1 == 1, cell	

	tab wspd1 wspd7 if dropout1 == 0, cell
	tab wspd1 wspd7 if dropout1 == 1, cell	
